<?php

namespace app\admin\controller\tpextbuilder;

use app\common\controller\BackendNew;

class Upload2 extends BackendNew
{
    protected $noNeedRight = ['*'];
    
    /**
     * upload.php
     *
     * Copyright 2013, Moxiecode Systems AB
     * Released under GPL License.
     *
     * License: http://www.plupload.com/license
     * Contributing: http://www.plupload.com/contributing
     */

    #!! 注意
    #!! 此文件只是个示例，不要用于真正的产品之中。
    #!! 不保证代码安全性。

    #!! IMPORTANT:
    #!! this file is just an example, it doesn't incorporate any security checks and
    #!! is not recommended to be used in production environment as it is. Be sure to
    #!! revise it and customize to your needs.

    public function upfiles()
    {
        // Make sure file is not cached (as it happens for example on iOS devices)
        header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
        header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
        header("Cache-Control: no-store, no-cache, must-revalidate");
        header("Cache-Control: post-check=0, pre-check=0", false);
        header("Pragma: no-cache");


        // Support CORS
        // header("Access-Control-Allow-Origin: *");
        // other CORS headers if any...
        if ($_SERVER['REQUEST_METHOD'] == 'OPTIONS') {
            exit; // finish preflight CORS requests here
        }


        if (!empty($_REQUEST['debug'])) {
            $random = rand(0, intval($_REQUEST['debug']));
            if ($random === 0) {
                header("HTTP/1.0 500 Internal Server Error");
                exit;
            }
        }

        // header("HTTP/1.0 500 Internal Server Error");
        // exit;


        // 5 minutes execution time
        @set_time_limit(5 * 60);

        // Uncomment this one to fake upload time
        // usleep(5000);

        // Settings
        // $targetDir = ini_get("upload_tmp_dir") . DIRECTORY_SEPARATOR . "plupload";
        $targetDir = 'uploads2/tmp';

        $date = date('Ymd');
        $uploadDir = "uploads2/web/" . $date;

        $cleanupTargetDir = true; // Remove old files
        $maxFileAge = 5 * 3600; // Temp file age in seconds


        // Create target dir
        if (!file_exists($targetDir)) {
            @mkdir($targetDir, 0775, true);
        }

        // Create target dir
        if (!file_exists($uploadDir)) {
            @mkdir($uploadDir, 0775, true);
        }

        // Get a file name
        if (isset($_REQUEST["name"])) {
            $fileName = $_REQUEST["name"];
        } elseif (!empty($_FILES)) {
            $fileName = $_FILES["file"]["name"];
        } else {
            $fileName = uniqid("file_");
        }

        $suffix = preg_replace('/.+?(\w+)$/', '$1', $fileName);

        $fileName = str_replace(['\\', '/', '.' . $suffix, '..', ' ', '.'], '', $fileName) . '.' . $suffix;

        $filePath = $targetDir . DIRECTORY_SEPARATOR . $fileName;

        // Chunking might be enabled
        $chunk = isset($_REQUEST["chunk"]) ? intval($_REQUEST["chunk"]) : 0;
        $chunks = isset($_REQUEST["chunks"]) ? intval($_REQUEST["chunks"]) : 1;


        // Remove old temp files
        if ($cleanupTargetDir) {
            if (!is_dir($targetDir) || !$dir = opendir($targetDir)) {
                return json(
                    ['status' => 500, 'info' => '上传失败-Failed to open temp directory', 'class' => 'error']
                );
            }

            while (($file = readdir($dir)) !== false) {
                $tmpfilePath = $targetDir . DIRECTORY_SEPARATOR . $file;

                // If temp file is current file proceed to the next
                if ($tmpfilePath == "{$filePath}_{$chunk}.part" || $tmpfilePath == "{$filePath}_{$chunk}.parttmp") {
                    continue;
                }

                // Remove temp file if it is older than the max age and is not the current file
                if (preg_match('/\.(part|parttmp)$/', $file) && (@filemtime($tmpfilePath) < time() - $maxFileAge)) {
                    @unlink($tmpfilePath);
                }
            }
            closedir($dir);
        }


        // Open temp file
        if (!$out = @fopen("{$filePath}_{$chunk}.parttmp", "wb")) {
            return json(
                ['status' => 500, 'info' => '上传失败-Failed to open output stream', 'class' => 'error']
            );
        }

        if (!empty($_FILES)) {
            if ($_FILES["file"]["error"] || !is_uploaded_file($_FILES["file"]["tmp_name"])) {
                return json(
                    ['status' => 500, 'info' => '上传失败-Failed to move uploaded file', 'class' => 'error']
                );
            }

            // Read binary input stream and append it to temp file
            if (!$in = @fopen($_FILES["file"]["tmp_name"], "rb")) {
                return json(
                    ['status' => 500, 'info' => '上传失败-Failed to open input stream', 'class' => 'error']
                );
            }
        } else {
            if (!$in = @fopen("php://input", "rb")) {
                return json(
                    ['status' => 500, 'info' => '上传失败-Failed to open input stream', 'class' => 'error']
                );
            }
        }

        while ($buff = fread($in, 4096)) {
            fwrite($out, $buff);
        }

        @fclose($out);
        @fclose($in);

        rename("{$filePath}_{$chunk}.parttmp", "{$filePath}_{$chunk}.part");

        $index = 0;
        $done = true;
        for ($index = 0; $index < $chunks; $index++) {
            if (!file_exists("{$filePath}_{$index}.part")) {
                $done = false;
                break;
            }
        }

        $fileNamenew =  md5(microtime(true)) . mt_rand(1000, 9999) . '.' . $suffix;
        $uploadPath = $uploadDir . DIRECTORY_SEPARATOR . $fileNamenew;
        if ($done) {

            if (!$out = @fopen($uploadPath, "wb")) {
                return json(
                    ['status' => 500, 'info' => '上传失败-Failed to open output stream' . $uploadPath, 'class' => 'error']
                );
            }

            if (flock($out, LOCK_EX)) {
                for ($index = 0; $index < $chunks; $index++) {
                    if (!$in = @fopen("{$filePath}_{$index}.part", "rb")) {
                        break;
                    }

                    while ($buff = fread($in, 4096)) {
                        fwrite($out, $buff);
                    }

                    @fclose($in);
                    @unlink("{$filePath}_{$index}.part");
                }

                flock($out, LOCK_UN);
            }
            @fclose($out);
        }

        // Return Success JSON-RPC response
        return json(
            ['status' => 200, 'info' => '上传成功', 'class' => 'success', 'id' => rand(1, 9999), 'picurl' => '/' . ltrim($uploadPath, '/')]
        );
    }
}
